﻿Imports System

Namespace System.Workflow.Activities.Rules
    Friend Class NullLiteral
        Inherits Literal
        ' Methods
        Friend Sub New(ByVal type As Type)
            MyBase.m_type = type
        End Sub

        Friend Overrides Function Equal(ByVal rhs As Literal) As Boolean
            Return (rhs.Value Is Nothing)
        End Function

        Friend Overrides Function GreaterThan(ByVal literalValue As Byte) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThan(ByVal literalValue As Char) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThan(ByVal literalValue As Decimal) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThan(ByVal literalValue As Double) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThan(ByVal literalValue As Short) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThan(ByVal literalValue As Integer) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThan(ByVal literalValue As Long) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThan(ByVal literalValue As [SByte]) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThan(ByVal literalValue As Single) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThan(ByVal literalValue As String) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThan(ByVal literalValue As UInt16) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThan(ByVal literalValue As UInt32) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThan(ByVal literalValue As UInt64) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThan(ByVal rhs As Literal) As Boolean
            Return rhs.LessThan
        End Function

        Friend Overrides Function GreaterThanOrEqual() As Boolean
            Return (MyBase.m_type Is GetType(String))
        End Function

        Friend Overrides Function GreaterThanOrEqual(ByVal literalValue As Byte) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThanOrEqual(ByVal literalValue As Char) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThanOrEqual(ByVal literalValue As Decimal) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThanOrEqual(ByVal literalValue As Double) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThanOrEqual(ByVal literalValue As Short) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThanOrEqual(ByVal literalValue As Integer) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThanOrEqual(ByVal literalValue As Long) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThanOrEqual(ByVal literalValue As [SByte]) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThanOrEqual(ByVal literalValue As Single) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThanOrEqual(ByVal literalValue As String) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThanOrEqual(ByVal literalValue As UInt16) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThanOrEqual(ByVal literalValue As UInt32) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThanOrEqual(ByVal literalValue As UInt64) As Boolean
            Return False
        End Function

        Friend Overrides Function GreaterThanOrEqual(ByVal rhs As Literal) As Boolean
            Return rhs.LessThanOrEqual
        End Function

        Friend Overrides Function LessThan(ByVal literalValue As Byte) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThan(ByVal literalValue As Char) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThan(ByVal literalValue As Decimal) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThan(ByVal literalValue As Double) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThan(ByVal literalValue As Short) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThan(ByVal literalValue As Integer) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThan(ByVal literalValue As Long) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThan(ByVal literalValue As [SByte]) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThan(ByVal literalValue As Single) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThan(ByVal literalValue As String) As Boolean
            Return True
        End Function

        Friend Overrides Function LessThan(ByVal literalValue As UInt16) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThan(ByVal literalValue As UInt32) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThan(ByVal literalValue As UInt64) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThan(ByVal rhs As Literal) As Boolean
            Return rhs.GreaterThan
        End Function

        Friend Overrides Function LessThanOrEqual() As Boolean
            Return (MyBase.m_type Is GetType(String))
        End Function

        Friend Overrides Function LessThanOrEqual(ByVal literalValue As Byte) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThanOrEqual(ByVal literalValue As Char) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThanOrEqual(ByVal literalValue As Decimal) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThanOrEqual(ByVal literalValue As Double) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThanOrEqual(ByVal literalValue As Short) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThanOrEqual(ByVal literalValue As Integer) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThanOrEqual(ByVal literalValue As Long) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThanOrEqual(ByVal literalValue As [SByte]) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThanOrEqual(ByVal literalValue As Single) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThanOrEqual(ByVal literalValue As String) As Boolean
            Return True
        End Function

        Friend Overrides Function LessThanOrEqual(ByVal literalValue As UInt16) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThanOrEqual(ByVal literalValue As UInt32) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThanOrEqual(ByVal literalValue As UInt64) As Boolean
            Return False
        End Function

        Friend Overrides Function LessThanOrEqual(ByVal rhs As Literal) As Boolean
            Return rhs.GreaterThanOrEqual
        End Function


        ' Properties
        Friend Overrides ReadOnly Property Value As Object
            Get
                Return Nothing
            End Get
        End Property

    End Class
End Namespace

